﻿Public Class Lap

    Public Sub New()
        mRecords = New List(Of RecordMessage)
    End Sub

    Private mRecords As List(Of RecordMessage)
    Public ReadOnly Property Records As List(Of RecordMessage)
        Get
            Return mRecords
        End Get
    End Property

    Public Property LapMessage As LapMessage

    Public Sub AddRecord(Record As RecordMessage)
        mRecords.Add(Record)
    End Sub
End Class
